<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "goback" 10/6/91 10:30 PM---- HANDLERS: mouseUp(globals:lastact),mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseUpglobal lastactput the ticks into lastactvisual scroll rightgo cd "c1"updatelocationupdatetimeend mouseUpon mousewithinHCBalloon "Click here to return to the main card."end mousewithin</script>
</part>
<part>
<id>2</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>14</left>
<top>71</top>
<right>110</right>
<bottom>90</bottom>
</rect>
<style>checkbox</style>
<showName> <true /> </showName>
<highlight> <true /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Time Zone</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "Time Zone" 10/6/91 10:30 PM---- HANDLERS: mouseUp,mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseUpif the highlight of me is true thenshow btn "tzhide"elsehide btn "tzhide"end ifhidecheckend mouseUpon mousewithinif the highlight of me is "true" thenHCBalloon "Uncheck this to specify your time zone manually.",15,10elseHCBalloon "Check this to use the values stored in parameter RAM for your time zone.",15,10end ifend mousewithin</script>
</part>
<part>
<id>3</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>14</left>
<top>54</top>
<right>110</right>
<bottom>72</bottom>
</rect>
<style>checkbox</style>
<showName> <true /> </showName>
<highlight> <true /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Location</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "Location" 10/6/91 10:30 PM---- HANDLERS: mouseUp,mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseUpif the highlight of me is true thenshow btn "lochide"elsehide btn "lochide"end ifhidecheckend mouseUpon mousewithinif the highlight of me is "true" thenHCBalloon "Uncheck this to specify your location manually.",25,10elseHCBalloon "Check this to use the values stored in parameter RAM for your location.",25,10end ifend mousewithin</script>
</part>
<part>
<id>4</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>210</left>
<top>71</top>
<right>278</right>
<bottom>89</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>lat</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card field "lat" 10/6/91 10:30 PM---- HANDLERS: mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mousewithinHCBalloon "Enter your latitude in this field."end mousewithin</script>
</part>
<part>
<id>5</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>288</left>
<top>57</top>
<right>318</right>
<bottom>77</bottom>
</rect>
<style>radiobutton</style>
<showName> <true /> </showName>
<highlight> <true /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>N</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "N" 10/6/91 10:30 PM---- HANDLERS: mouseUp,mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseUpif the highlight of me is "false" thenset the highlight of me to "true"set the highlight of btn "S" to "false"end ifend mouseUpon mousewithinHCBalloon "Click here if your latitude is north of the equator.",0,10end mousewithin</script>
</part>
<part>
<id>6</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>288</left>
<top>76</top>
<right>318</right>
<bottom>96</bottom>
</rect>
<style>radiobutton</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>S</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "S" 10/6/91 10:30 PM---- HANDLERS: mouseUp,mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseUpif the highlight of me is "false" thenset the highlight of me to "true"set the highlight of btn "N" to "false"end ifend mouseUpon mousewithinHCBalloon "Click here if your latitude is south of the equator.",0,10end mousewithin</script>
</part>
<part>
<id>7</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>288</left>
<top>113</top>
<right>318</right>
<bottom>133</bottom>
</rect>
<style>radiobutton</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>E</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "E" 10/6/91 10:30 PM---- HANDLERS: mouseUp,mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseUpif the highlight of me is "false" thenset the highlight of me to "true"set the highlight of btn "W" to "false"end ifend mouseUpon mousewithinHCBalloon "Click here if your longitude is east of Greenwich.",0,10end mousewithin</script>
</part>
<part>
<id>8</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>288</left>
<top>132</top>
<right>318</right>
<bottom>152</bottom>
</rect>
<style>radiobutton</style>
<showName> <true /> </showName>
<highlight> <true /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>W</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "W" 10/6/91 10:30 PM---- HANDLERS: mouseUp,mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseUpif the highlight of me is "false" thenset the highlight of me to "true"set the highlight of btn "E" to "false"end ifend mouseUpon mousewithinHCBalloon "Click here if your longitude is west of Greenwich.",0,10end mousewithin</script>
</part>
<part>
<id>9</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>210</left>
<top>127</top>
<right>278</right>
<bottom>145</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>lon</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card field "lon" 10/6/91 10:31 PM---- HANDLERS: mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mousewithinHCBalloon "Enter your longitude in this field."end mousewithin</script>
</part>
<part>
<id>10</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>194</left>
<top>0</top>
<right>335</right>
<bottom>179</bottom>
</rect>
<style>opaque</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>lochide</name>
<script></script>
</part>
<part>
<id>14</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>440</left>
<top>55</top>
<right>488</right>
<bottom>73</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>tz</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card field "tz" 10/6/91 10:31 PM---- HANDLERS: mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mousewithinHCBalloon "Enter your time zone difference here."end mousewithin</script>
</part>
<part>
<id>11</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>345</left>
<top>28</top>
<right>507</right>
<bottom>157</bottom>
</rect>
<style>opaque</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>tzhide</name>
<script></script>
</part>
<part>
<id>21</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>104</left>
<top>58</top>
<right>161</right>
<bottom>84</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>By Call</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "By Call" 10/6/91 10:30 PM---- HANDLERS: mouseup,install,mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseupask "Enter your callsign"if the result is "Cancel" then exit mouseupput CallToNum(it) into niaif item 1 of nia is 1 thenput NumToInfo(item 2 of nia) into niinstall nielse if item 1 of nia is 0 thenanswer "Sorry, that call is not recognized." with "OK"elseput empty into clput empty into sclrepeat with i = 2 to (number of items in nia)put NumToInfo(item i of nia) & return after clput item 2 of line i-1 of cl & return after sclend repeatput XScrollBox(0,"Ambiguous call - Select one:",scl) into ansif ans is not empty thenput line (item 1 of ans) of cl into niinstall niend ifend ifend mouseupon install niif the highlight of btn "location" is false thenput abs(item 7 of ni) into cd fld "lat"if item 7 of ni < 0 thenset the highlight of btn "N" to falseset the highlight of btn "S" to trueelseset the highlight of btn "N" to trueset the highlight of btn "S" to falseend ifput abs(item 8 of ni) into cd fld "lon"if item 8 of ni < 0 thenset the highlight of btn "E" to falseset the highlight of btn "W" to trueelseset the highlight of btn "E" to trueset the highlight of btn "W" to falseend ifend ifif the highlight of btn "time zone" is false thenput item 6 of ni into cd fld "tz"end ifend installon mousewithinHCBalloon "Click here to set your location and time zone by call sign. You will be prompted to enter a call sign or prefix.",7,7end mousewithin</script>
</part>
<part>
<id>22</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>13</left>
<top>103</top>
<right>181</right>
<bottom>122</bottom>
</rect>
<style>checkbox</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Draw grayline on open</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "Draw grayline on open" 10/6/91 10:30 PM---- HANDLERS: mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mousewithinif the highlight of me is "true" thenHCBalloon "Uncheck this to prevent the grayline from being drawn immediately when the stack is opened.",12,10elseHCBalloon "Check this to draw the grayline immediately when the stack is opened.",12,10end ifend mousewithin</script>
</part>
<part>
<id>23</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>13</left>
<top>123</top>
<right>181</right>
<bottom>142</bottom>
</rect>
<style>checkbox</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>icago~</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>24 hour time format</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "24 hour time format" 10/6/91 10:30 PM---- HANDLERS: mouseUp(globals:t24),mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseUpglobal t24if the highlight of me is true thenset the highlight of me to falseput "false" into t24elseset the highlight of me to trueput "true" into t24end ifend mouseUpon mousewithinif the highlight of me is "true" thenHCBalloon "Uncheck this to display the time in a 12-hour format.",20,10elseHCBalloon "Check this to display the time in a 24-hour format.",20,10end ifend mousewithin</script>
</part>
<part>
<id>24</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>13</left>
<top>143</top>
<right>170</right>
<bottom>160</bottom>
</rect>
<style>checkbox</style>
<showName> <true /> </showName>
<highlight> <true /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>icago~</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>auto daylight savings</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "auto daylight savings" 10/6/91 10:30 PM---- HANDLERS: mouseUp,mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseUpif the highlight of me is "false" thenshow btn "summer time"show btn "standard time"elsehide btn "summer time"hide btn "standard time"end ifend mouseUpon mousewithinif the highlight of me is "true" thenHCBalloon "Uncheck this to specify standard or daylight savings time manually.",5,10elseHCBalloon "Check this to determine automatically if daylight savings time is in effect. The rules applied are those used in the USA.",5,10end ifend mousewithin</script>
</part>
<part>
<id>25</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>24</left>
<top>178</top>
<right>137</right>
<bottom>194</bottom>
</rect>
<style>radiobutton</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>icago~</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>summer time</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "summer time" 10/6/91 10:30 PM---- HANDLERS: mouseUp,mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseUpif the highlight of me is "false" thenset the highlight of me to "true"set the highlight of btn "standard time" to "false"end ifend mouseUpon mousewithinHCBalloon "Click here to specify summer time (daylight savings time).",10,10end mousewithin</script>
</part>
<part>
<id>26</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>24</left>
<top>162</top>
<right>137</right>
<bottom>178</bottom>
</rect>
<style>radiobutton</style>
<showName> <true /> </showName>
<highlight> <true /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>icago~</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>standard time</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "standard time" 10/6/91 10:30 PM---- HANDLERS: mouseUp,mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseUpif the highlight of me is "false" thenset the highlight of me to "true"set the highlight of btn "summer time" to "false"end ifend mouseUpon mousewithinHCBalloon "Click here to specify standard time.",10,10end mousewithin</script>
</part>
<content>
<layer>card</layer>
<id>4</id>
<text>39</text>
</content>
<content>
<layer>card</layer>
<id>9</id>
<text>77</text>
</content>
<content>
<layer>card</layer>
<id>14</id>
<text>-5</text>
</content>
<name>config</name>
<script>--——————— card "config" 10/6/91 10:30 PM---- HANDLERS: hidecheck----——————–on hidecheckif the highlight of btn "location" is true and¬the highlight of btn "time zone" is true thenhide btn "by call"elseshow btn "by call"end ifend hidecheck</script>
</card>
card_5555.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>--——————— card button "sun" 10/6/91 10:29 PM---- HANDLERS: mouseUp(globals:GrayLineFlag,lastact),mousewithin----——————–on mouseUpglobal GrayLineFlag, lastactif the shiftkey is down thenif GrayLineFlag is "true" thenset the highlight of me to "true"put "false" into Graylineflagset cursor to "watch"lock screengo cd "c2"choose select tooldomenu "Select All"domenu "Copy Picture"go cd "c1"domenu "Paste Picture"choose browse toolunlock screenelseset the highlight of me to "false"put "true" into Graylineflagput the ticks into lastactend ifelseif GrayLineFlag is "true" then dograylineNowend ifend mouseUpon mousewithinif the highlight of me is "true" thenhcballoon "This button indicates the location on the Earth at which the Sun is directly overhead." &&¬"Click on the button with the shift key depressed to enable the drawing of the grayline."elsehcballoon "This button indicates the location on the Earth at which the Sun is directly overhead." &&¬"Click on this button to update the position of the grayline immediately." &&¬"Click on the button with the shift key depressed to disable the drawing of the grayline."end ifend mousewithin</script>
</part>
<part>
<id>10</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>3</left>
<top>4</top>
<right>153</right>
<bottom>181</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>MonaHam</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>f1</name>
<script>--——————— card field "f1" 10/6/91 10:29 PM---- HANDLERS: mousedownx,mousewithin----——————–on mousedownxif the textsize of me is 12 thenset the textsize of me to 9elseset the textsize of me to 12end ifend mousedownxon mousewithinput "This field shows information about" && ¬line 1 of me & "." into thestrhcballoon thestr,40,40end mousewithin</script>
</part>
<part>
<id>1</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>0</left>
<top>0</top>
<right>153</right>
<bottom>182</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>MonaHam</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>country list</name>
<script>--——————— card field "country list" 10/6/91 10:29 PM---- HANDLERS: mousedown,mousewithin----——————–on mousedownplay "clicker"set the cursor to "watch"put the clickline into tclselect tclshowinfo(char 26 to 29 of the value of tcl)set the cursor to 1end mousedownon mousewithinhcballoon "Select a DXCC country by clicking on the name of the country." &&¬"Typing a letter on the keyboard will scroll the list to the first country beginning with that letter.",20,100end mousewithin</script>
</part>
<part>
<id>11</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>474</left>
<top>185</top>
<right>486</right>
<bottom>200</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>31392</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>help</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "help" 10/6/91 10:29 PM---- HANDLERS: mouseup,mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseupshow cd fld "info1"end mouseupon mousewithinhcballoon "Click on this button to show a field containing more information about this stack."end mousewithin</script>
</part>
<part>
<id>15</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>247</left>
<top>47</top>
<right>259</right>
<bottom>59</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>24420</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>here</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "here" 10/6/91 10:29 PM---- HANDLERS: mouseDown,mouseStillDown,mouseup(globals:lastact,-- mylat,mylon,tz),mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseDownset cursor to "cross"put empty into cd fld "f1"hide cd fld "country list"put "Show List" into cd fld "list"end mouseDownon mouseStillDowntrackitend mouseStillDownon mouseupglobal lastact,mylat,mylon,tzput round(90 - (0.89109 * (item 2 of the loc of me))) into latput round((item 1 of the loc of me - 153) * 1.0056 - 180) into lonput lat into mylatput lon into mylonput abs(lat) into cd fld "lat" of cd "config"put abs(lon) into cd fld "lon" of cd "config"if lat<0 thenset the highlight of btn "N" of cd "config" to "false"set the highlight of btn "S" of cd "config" to "true"elseset the highlight of btn "S" of cd "config" to "false"set the highlight of btn "N" of cd "config" to "true"end ifif lon<0 thenset the highlight of btn "E" of cd "config" to "false"set the highlight of btn "W" of cd "config" to "true"elseset the highlight of btn "W" of cd "config" to "false"set the highlight of btn "E" of cd "config" to "true"end ifset the highlight of btn "location" of cd "config" to "false"hide btn "lochide" of cd "config"put empty into tzput the loc of me into posif (item 1 of pos) > 483 then put 483 into item 1 of posif (item 1 of pos) < 181 then put 181 into item 1 of posput 5 into item 2 of posset the loc of cd fld "localtime" to posput the ticks into lastactend mouseupon mousewithinhcballoon "This button marks your location. You may move it around by mousing down and dragging it."end mousewithin</script>
</part>
<part>
<id>18</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>344</left>
<top>29</top>
<right>356</right>
<bottom>41</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>20254</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>there</name>
<script>--——————— card button "there" 10/6/91 10:29 PM---- HANDLERS: mouseDown,mouseStillDown,mouseup(globals:lastact,-- mylat,mylon),mousewithin----——————–on mouseDownset cursor to "cross"put empty into cd fld "f1"hide cd fld "country list"put "Show List" into cd fld "list"set textstyle of cd fld "f1" to "plain"put empty into cd fld "otz"hide cd fld "otime"end mouseDownon mouseStillDowntrackitend mouseStillDownon mouseupglobal lastact,mylat,mylonput round(90 - (0.89109 * item 2 of the loc of me)) into latput round((item 1 of the loc of me - 153) * 1.0056 - 180) into lonif mylat is empty and mylon is empty thenelsecoords mylat, mylon, lat, lonput the result into distxput return & "Distance: " & round(item 1 of distx) & " mi" ¬& return & " " ¬& round(item 2 of distx) & " km" & return & "Bearing: " &¬round(item 3 of distx) & numtochar(161) & return¬after cd fld "f1"end ifput the ticks into lastactend mouseupon mousewithinhcballoon "This button marks the remote location. You may move it around by mousing down and dragging it."end mousewithin</script>
</part>
<part>
<id>22</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>303</left>
<top>188</top>
<right>360</right>
<bottom>201</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>MonaHam</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>UTCtime</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card field "UTCtime" 10/6/91 10:29 PM---- HANDLERS: mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mousewithinhcballoon "This field displays the Coordinated Universal Time (UTC)."end mousewithin</script>
</part>
<part>
<id>25</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>225</left>
<top>65535</top>
<right>281</right>
<bottom>12</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>MonaHam</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>localtime</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card field "localtime" 10/6/91 10:29 PM---- HANDLERS: mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mousewithinhcballoon "This field displays your local time."end mousewithin</script>
</part>
<part>
<id>23</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>322</left>
<top>65535</top>
<right>378</right>
<bottom>12</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>MonaHam</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>otime</name>
<script>--——————— card field "otime" 10/6/91 10:29 PM---- HANDLERS: mousewithin----——————–on mousewithinhcballoon "This field displays the local time at the remote location." && ¬"This is the standard time. If summer time is in effect at this location then add one hour."end mousewithin</script>
</part>
<part>
<id>35</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>78</left>
<top>182</top>
<right>151</right>
<bottom>200</bottom>
</rect>
<style>opaque</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>cloak</name>
<script></script>
</part>
<part>
<id>47</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>170</left>
<top>119</top>
<right>231</right>
<bottom>138</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>otz</name>
<script></script>
</part>
<part>
<id>51</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>4</left>
<top>184</top>
<right>71</right>
<bottom>199</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>MonaHam</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>find call</name>
<script>--——————— card field "find call" 10/6/91 10:30 PM---- HANDLERS: mouseUp(globals:lastact),mousewithin----——————–on mouseUpglobal lastactplay "clicker"ask "What call or prefix?"if the result is not "Cancel" thenput it into tcput CallToNum(tc) into cnif item 1 of cn is 1 thenShowInfo(item 2 of cn)end ifif (item 1 of cn) > 1 thenput empty into clput empty into sclrepeat with i = 2 to (number of items in cn)put NumToInfo(item i of cn) & return after clput item 2 of line i-1 of cl & return after sclend repeatput XScrollBox(0,"Ambiguous call - Select one:",scl) into ansif ans is not empty thenShowInfo(item (1 + (item 1 of ans)) of cn)end ifend ifif item 1 of cn is 0 thenbeepanswer "Sorry, that callsign or prefix is unknown or incomplete." with "OK"end ifend ifput the ticks into lastactend mouseUpon mousewithinHCBalloon "Click this button to find a DXCC country by callsign. " &&¬"You will be prompted to type in a callsign."end mousewithin</script>
</part>
<part>
<id>52</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>78</left>
<top>184</top>
<right>145</right>
<bottom>199</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>MonaHam</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>list</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card field "list" 10/6/91 10:30 PM---- HANDLERS: mouseUp(globals:lastact),mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseUpglobal lastactplay "clicker"if me is "Show List" thenshow cd fld "country list"put "Hide List" into meelsehide cd fld "country list"put "Show List" into meend ifput the ticks into lastactend mouseUpon mousewithinif me is "Show List" thenHCBalloon "Click this button to show a scrolling list of DXCC countries."elseHCBalloon "Click this button to hide the scrolling list of DXCC countries above."end ifend mousewithin</script>
</part>
<part>
<id>53</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>159</left>
<top>143</top>
<right>314</right>
<bottom>182</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>icago</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>timeinfo</name>
<script></script>
</part>
<part>
<id>54</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>493</left>
<top>185</top>
<right>511</right>
<bottom>199</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>16560</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>config</name>
<script>--——————— card button "config" 10/6/91 10:29 PM---- HANDLERS: mouseup,mousewithin----——————–on mouseupvisual scroll leftgo cd "config"end mouseupon mousewithinhcballoon "Click on this button to go to the configuration card," &&¬"where various options may be set."end mousewithin</script>
</part>
<part>
<id>57</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>155</left>
<top>185</top>
<right>172</right>
<bottom>200</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>21847</icon>
<textAlign>center</textAlign>
<font>icago~</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>gohome</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card button "gohome" 10/6/91 10:29 PM---- HANDLERS: mouseUp,mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mouseUpvisual effect dissolve fastgo homeend mouseUpon mousewithinHCBalloon "Click this button to go to the Home card."end mousewithin</script>
</part>
<part>
<id>56</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>0</left>
<top>0</top>
<right>512</right>
<bottom>200</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>info1</name>
<script>--ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇö card field "info1" 10/6/91 10:30 PM---- HANDLERS: mousedown,mousewithin----ΓÇöΓÇöΓÇöΓÇöΓÇöΓÇöΓÇôon mousedown--show cd fld "info2"hide meend mousedownon mousewithinHCBalloon "Click on this field to hide it.",200,100end mousewithin</script>
</part>
<content>
<layer>card</layer>
<id>1</id>
<text>Abu Ail, Jabal at Tair 324Afghanistan 234Agalega & St Brandon 270Aland Is 129Alaska 115Albania 247Algeria 307Am Samoa 112Amsterdam & St Paul Is 59Andaman & Nicobar Is 224Andorra 12Angola 30Anguilla 210Antarctica 17Antigua, Barbuda 194Argentina 121Armenia 187Aruba 137Ascension Is 251Auckland, Campbell Is 261Australia 201Austria 127Aves Is 245Azerbaijan 185Azores 26Bahamas 14Bahrain 7Baker & Howland Is 104Balearic Is 36Banaba 162Bangladesh 146Barbados 308Belau 102Belgium 132Belize 195Benin 178Bermuda 219Bhutan 4Bolivia 23Botswana 1Bouvet 282Br Virgin Is 212Brazil 141Brunei 199Bulgaria 124Burkina Faso 228Burma 232Burundi 320Byelorussia 184Cambodia 229Cameroon 171Canada 200Canary Is 37Cape Verde 31Cayman Is 253Central African Rep 173Central Kiribati 160Ceuta & Melilla 38Chad 176Chagos 220Chatham Is 259Chile 16China 10Christmas Is 204Clipperton Is 49Cocos Is 170Cocos-Keeling Is 205Colombia 77Comoros 32Congo 174Conway Reef 275Corsica 172Costa Rica 169Crete 157Crozet 57Cuba 22Cyprus 292Cyprus SBA 249Czechoslovakia 131Denmark 135Desecheo Is 119Djibouti 88Dodecanese 156Dominica 92Dominican Rep 76East Kiribati 161East Malaysia 317Easter Is 18Ecuador 73Egypt 154El Salvador 242England 62Equatorial Guinea 273Estonia 42Ethiopia 43Falkland Is 214Faroe Is 134Fernando de Noronha 142Fiji Is 276Finland 128France 44Franz Josef Land 285French Guiana 61French Polynesia 50Gabon 175Galapagos Is 74Georgia 186Germany 33Ghana 311Gibraltar 248Glorioso Is 52Greece 155Greenland 133Grenada 89Guadeloupe 45Guam 105Guantanamo Bay 103Guatemala 168Guernsey 67Guinea 281Guinea-Bissau 90Guyana 310Haiti 75Hawaii 110Heard Is 208Honduras 82Hong Kong 222Hungary 70Iceland 167India 223Indonesia 235Iran 41Iraq 236Ireland 39Isle of Man 63Israel 290Italy 86ITU Geneva 287Ivory Coast 177Jamaica 303Jan Mayen 99Japan 94Jersey 65Johnston Is 106Jordan 100Juan de Nova, Europa 53Juan Fernandez 20Kaliningrad 181Kazakhstan 191Kenya 301Kerguelen Is 58Kermadec Is 260Kingman Reef 109Kirghizia 192Korea 80Kure Is 111Kuwait 314Laccadive Is 225Laos 230Latvia 239Lebanon 126Lesotho 305Liberia 40Libya 291Liechtenstein 72Lithuania 123Lord Howe Is 202Luxembourg 122Macao 231Macquarie Is 209Madagascar 295Madeira Is 25Malawi 306Maldive Is 309Mali 179Malpelo Is 78Malta 312Malta SMO 267Malyj Vysotskij Is 284Mariana Is 114Market Reef 130Marshall Is 198Martinique 48Mauritania 296Mauritius 271Mayotte 46Mellish Reef 206Mexico 226Micronesia 197Midway Is 107Minami Torishima 95Moldavia 193Monaco 269Mongolia 97Montserrat 211Morocco 21Mozambique 15Mt Athos 158Namibia 264Nauru 11Navassa Is 116Nepal 318Neth Antilles 139Netherlands 138New Caledonia 47New Zealand 258Nicaragua 240Niger 297Nigeria 294Niue 256No Cook Is 254No Ireland 64Norfolk Is 203Norway 120Ogasawara 96Oman 3Pagalu 274Pakistan 8Palmyra, Jarvis Is 108Panama 81Papua New Guinea 136Paraguay 262Peru 125Peter I 283Philippines 34Pitcairn Is 221Poland 151Portugal 24Pr Edward & Marion Is 265Puerto Rico 118Qatar 6Reunion 54Revilla Gigedo 227Rodriguez Is 272Romania 241Rotuma 277Russia (Asiatic) 182Russia (European) 180Rwanda 322Sable Is 29San Andres & Provid. 79San Felix 19San Marino 165Sao Tome & Principe 148Sardinia 87Saudi Arabia 85Scotland 66Senegal 302Seychelles 147Sierra Leone 315Singapore 321So Africa 263So Cook Is 255So Georgia Is 215So Orkney Is 216So Sandwich Is 217So Shetland Is 218Solomon Is 69Somali 164Southern Sudan 153Spain 35Spratly Is 268Sri Lanka 286St Helena 250St Kitts, Nevis 196St Lucia 91St Maarten,Saba,StEus 140St Martin 56St Paul Is 28St Peter & St Paul 143St Pierre & Miquelon 51St Vincent 93Sudan 152Surinam 145Svalbard 98Swaziland 278Sweden 150Switzerland 71Syria 238Tadzhikistan 190Taiwan 9Tanzania 293Thailand 83The Gambia 13Togo 298Tokelau Is 257Tonga 2Trindade & Martin Vaz 144Trinidad & Tobago 323Tristan da Cunha&Gough 252Tromelin 55Tunisia 279Turkey 166Turkmenistan 188Turks & Caicos Is 213Tuvalu 159Uganda 300Ukraine 183UN HQ 288United Arab Emirates 5United States 101Uruguay 27Uzbekistan 189Vanuatu 237Vatican 84Venezuela 244Vietnam 280Virgin Is 117Wake Is 113Wales 68Wallis & Futuna Is 60Walvis Bay 266West Kiribati 163West Malaysia 316Western Sahara 149Western Samoa 299Willis Is 207Yemen 304Yugoslavia 243Zaire 319Zambia 313Zimbabwe 246</text>
</content>
<content>
<layer>card</layer>
<id>22</id>
<text>1405 UTC</text>
</content>
<content>
<layer>card</layer>
<id>25</id>
<text>10:05 AM</text>
</content>
<content>
<layer>card</layer>
<id>23</id>
<text>3:05 PM</text>
</content>
<content>
<layer>card</layer>
<id>51</id>
<text>Find Call</text>
</content>
<content>
<layer>card</layer>
<id>52</id>
<text>Hide List</text>
</content>
<content>
<layer>card</layer>
<id>53</id>
<text>-68 until next task10 until out of date-113 until next check</text>
</content>
<content>
<layer>card</layer>
<id>56</id>
<text><span class="style16">DX Map 1.1 by Len Saaf, NV2Z</span><span class="style17"></span><span class="style18">(click on this field to hide)</span><span class="style15">Copyright 1990,1991, Raleigh Associates</span><span class="style12"></span><span class="style18">This stack is freeware. It may be distributed in part or in whole provided that it is distributed for free.This stack enables amateur radio operators to find the location, bearing, and other information for the 'DXCC' countries of the world. It also displays the day and night portions of the globe dynamically. </span><span class="style19">DX Map features:</span><span class="style18">ΓÇó Your QTH is marked on the map and your local time appears above it (12 or 24 hour format).ΓÇó UTC is displayed at the bottom of the map.ΓÇó A dynamic grayline is shown on the map showing the day and night portions of the globe.ΓÇó A DXCC country can by selected by either choosing the country name from a list or by entering a callsign or prefix. The DXCC country is marked on the map and the following information is listed: ΓÇó Country name ΓÇó Continent ΓÇó CQ zone(s) ΓÇó ITU zone(s) ΓÇó Distance from your QTH in miles and kilometers ΓÇó Bearing in degrees from your QTH ΓÇó Callsign allocation ΓÇó The local time in the DXCC country is displayed above its location on the mapΓÇó Your location and the remote location are fully adjustable.</span><span class="style19">Using DX Map:</span><span class="style18"></span><span class="style20">To get Help:</span><span class="style18">Read this or use Balloon Help.</span><span class="style20">To choose a DXCC country from a list of countries:</span><span class="style18">If the scrolling list is not already visible at the left-hand side of the card, click the "Show List" button. Select a DXCC country by clicking on the name of the country. When the scrolling list is visible typing a letter will scroll the list to the first country that begins with that letter.</span><span class="style20">To choose a DXCC country from a prefix or callsign:</span><span class="style18">Click the "Find Call" button and you will be prompted for a callsign or prefix.</span><span class="style20">To find the distance and bearing to any location on the map:</span><span class="style18">Click and hold on the icon that marks the remote location. It is the one with the "X" cross. Move the icon to the desired location and release the mouse button. Note that the time at the remote location is not displayed since the remote time zone information is unknown.</span><span class="style20">To update the grayline immediately:</span><span class="style18">Click on the "Sun" button.</span><span class="style20">To turn off the grayline display:</span><span class="style18">Click on the "Sun" button while depressing the shift key. The sun button will turn black and the grayline will be removed. To reactive the grayline function click the sun button again with the shift key depressed.</span><span class="style19">Configuring DX Map</span><span class="style20">Changing your QTH:</span><span class="style18">One way to change your QTH is to click and hold on the small button that marks your QTH. You can then drag it to any position. Your local time remains unchanged. Another way to change your QTH is to go to the configuration card by clicking on the small right arrow button at the lower right-hand corner of the map card. The configuration card lets you choose whether or not you want to use the information stored in your Mac's parameter RAM for your QTH information. This information can be set using the Map control panel, which is part of the Macintosh system software. If you choose not to use that information, uncheck the box and some fields and buttons will appear that will let you specify the latitude and longitude of your QTH. You can also click on the "By Call" button to enter the location by callsign or prefix (This will also set your local time difference from UTC).</span><span class="style20">To change your local time zone information:</span><span class="style19"></span><span class="style18">The difference between your local time and UTC can be set at the configuration card (see above). If you uncheck the "Time Zone" check box, controls will appear to let you enter your local UTC time difference.</span><span class="style20">Dealing with daylight savings time:</span><span class="style18">On the configuration card there is a checkbox titled "Auto Daylight Savings." If this box is checked the stack will figure out whether or not DST (daylight savings time, a.k.a. summer time) is in effect in the USA and set the UTC time difference accordingly. (You still need to set your Mac's clock to the correct local timeΓÇöbe it standard or daylight savings.) If you don't use summer time, or if the rules for it are different at your QTH, uncheck the "Auto Daylight Savings" checkbox and use the radio buttons (that will appear) to choose between standard and daylight savings time. You can also modify the daylightsavingstime() function in the stack script to meet your needs. I have no data on the countries that use summer time so the time for remote locations is always standard time. Summer time is one hour later in most (if not all) cases.</span><span class="style20">To change the frequency at which the grayline is updated:</span><span class="style18">See the notes in the 'openstack' handler in the stack script.</span><span class="style19">Bugs:</span><span class="style18">Probably lots. The identification of DXCC countries from callsign surely has quite a few glitches. If any of the cards are deleted the stack will get very confused. Best to make a copy just in case.</span><span class="style19">More info:</span><span class="style18">I wrote 3 XFCNs for this stack:ΓÇó "CallToNum" takes a callsign and returns the number of DXCC countries that could have that callsign followed by ID numbers for each of those DXCC countries.ΓÇó "NumToInfo" takes one of those ID numbers and returns a bunch of info for that DXCC country. The info is from a list I got off rec.ham-radio.ΓÇó "coords" takes 2 lattitude/longitude pairs and returns the distance between them and the bearing from the first to the second.The source code to these 3 XFCNs is free for the asking. It is written in Pascal.Thanks to Mike Hoenig, N5LTL, for suggestions and encouragement!All bug reports, comments and/or suggestions are welcome. My addresses are:Len Saaf52 Raleigh St.Rochester, NY 14620Internet: saaf@joker.optics.rochester.edu</span></text>
<script>--——————— card "c1" 10/6/91 10:28 PM---- HANDLERS: ShowInfo(globals:lastact,mylat,mylon),keydown-- (globals:lastact),idle(globals:needfix,itime,nexttask,-- lastact,lastupd,updateInterval,delayInterval,GrayLineFlag)----——————–on ShowInfo tnumglobal lastact,mylat,mylonput NumToInfo(tnum) into linexput semitocom(item 2 of linex) & return & item 1 of linex & ¬" (" & item 3 of linex & ")" & return ¬& "CQ zone: " & semitocomns(item 5 of linex) & return & "ITU zone: " &¬semitocomns(item 4 of linex) & return into cd fld "f1"hide cd fld "country list"put "Show List" into cd fld "list"put item 7 of linex into latput item 8 of linex into loncoords mylat, mylon, lat, lon,tzput the result into distxput "Distance: " & round(item 1 of distx) & " mi" & return & ¬" " ¬& round(item 2 of distx) & " km" & return & "Bearing: " &¬round(item 3 of distx) & numtochar(161) & return ¬& "Calls: " & semitocom(item 9 of linex) after cd fld "f1"if (number of chars in cd fld "f1") > 152 thenset the textsize of cd fld "f1" to 9elseset the textsize of cd fld "f1" to 12end ifput -(item 6 of linex) into cd fld "otz"put the time into ttempconvert ttemp to secondsconvert ttemp to short timeput round((lon + 180) * 0.994444 + 153) & "," into posput round((90-lat) * 1.1222222) after posset the location of btn "there" to posif tz is not empty thenif (item 1 of pos) > 483 then put 483 into item 1 of posif (item 1 of pos) < 181 then put 181 into item 1 of posif abs((item 1 of pos)-(item 1 of (the loc of cd fld "localtime")))¬< 56 thenput 17 into item 2 of poselseput 5 into item 2 of posend ifset the loc of cd fld "otime" to posshow cd fld "otime"updateTimeelsehide cd fld "otime"hide cd fld "utctime"end ifrepeat with jjj=1 to 5set the highlight of btn "there" to trueset the highlight of btn "there" to falseend repeatput the ticks into lastactend showinfoon keydown thekeyglobal lastactif the visible of cd fld "country list" is "false" thenpass keydownelseif thekey is "a" then set the scroll of cd fld "country list" to 0if thekey is "b" then set the scroll of cd fld "country list" to 300if thekey is "c" then set the scroll of cd fld "country list" to 588if thekey is "d" then set the scroll of cd fld "country list" to 948if thekey is "e" then set the scroll of cd fld "country list" to 1020if thekey is "f" then set the scroll of cd fld "country list" to 1140if thekey is "g" then set the scroll of cd fld "country list" to 1248if thekey is "h" then set the scroll of cd fld "country list" to 1464if thekey is "i" then set the scroll of cd fld "country list" to 1536if thekey is "j" then set the scroll of cd fld "country list" to 1668if thekey is "k" then set the scroll of cd fld "country list" to 1764if thekey is "l" then set the scroll of cd fld "country list" to 1884if thekey is "m" then set the scroll of cd fld "country list" to 2016if thekey is "n" then set the scroll of cd fld "country list" to 2376if thekey is "o" then set the scroll of cd fld "country list" to 2568if thekey is "p" then set the scroll of cd fld "country list" to 2592if thekey is "q" then set the scroll of cd fld "country list" to 2760if thekey is "r" then set the scroll of cd fld "country list" to 2772if thekey is "s" then set the scroll of cd fld "country list" to 2868if thekey is "t" then set the scroll of cd fld "country list" to 3348if thekey is "u" then set the scroll of cd fld "country list" to 3552if thekey is "v" then set the scroll of cd fld "country list" to 3636if thekey is "w" then set the scroll of cd fld "country list" to 3684if thekey is "x" then set the scroll of cd fld "country list" to 3684if thekey is "y" then set the scroll of cd fld "country list" to 3684if thekey is "z" then set the scroll of cd fld "country list" to 3684end ifput the ticks into lastactend keydownon idleglobal needfix, itime, nexttask, lastact, lastupd, updateInterval,¬delayInterval, GrayLineFlagif GrayLineFlag is "true" thenif (the ticks - lastact) > delayInterval thenif ((the ticks - lastupd) > updateInterval) thenDoGraylineNowelseif ((the ticks - itime) > (updateInterval/ 3)) then DoGrayLineTaskend ifend ifend ifif needfix is "yes" thenfixfontsput "no" into needfixend ifif (timecvt(the time) is not cd field "Localtime") thenUpdateTimeDoSunPosend ifif the visible of cd fld "timeinfo" is true thenput round((updateinterval/3 + itime - the ticks)/60) && "until next task" & return &¬round((updateinterval + lastupd - the ticks)/60) && "until out of date" ¬& return & round((delayinterval + lastact - the ticks)/60) && "until next check"¬into cd fld "timeinfo"end ifpass idleend idle</script>
